%% Display Montages
% addpath('data');
% addpath('model_results2');
% addpath('../imdisp');
% addpath('../webcam-classifier-toolbox');
load_settings;
setup;

%% running this
% clear;
% load 'iter_baseline_sandbox1_4_new_back_0_rks_0_ftimes_0_pca_0.mat';
% load 'iter_data2.mat';
% load 'sandbox1_new_data2.mat';

%% Display Montages

% clear;
% load 'model_results2/special_iter_baseline_sandbox1_4_new_back_0_rks_0_ftimes_0_pca_0.mat';
% load 'special_iter_data2.mat';
% load 'sandbox1_new_data2.mat';

% %% Visualize training sets
% PP = YTR(YTR>0);
% NN = YTR(YTR<0);
% %% All examples of people
% disp('Training set people examples');
% svmMontage(ANN_TR, PP, false);
% %% All examples of bg
% disp('Training set bg examples');
% svmMontage(ANN_TR, NN, false);


%% Show baseline, so acc on the set it was trained on
% then this
[TP, FP, TN, FN] = get_statistics(baseline.TE.p, YTE, 1);

%%
disp('Showing TP montage');
svmMontage(ANN_TE, TP, false);
% keyboard
%%
disp('Showing FP montage');
svmMontage(ANN_TE, FP, false);
% keyboard
% % 
%%
disp('Showing TN montage');
svmMontage(ANN_TE, TN, false);
% keyboard
% % 
%%
disp('Showing FN montage');
svmMontage(ANN_TE, FN, false);
% keyboard

%% Baseline results on Cam 4
[NTP, NFP, NTN, NFN] = get_statistics(new.TE.p, NEWYTE, 1);

%%
disp('Showing TP montage');
svmMontage(NEWANN_TE, NTP, false);
% keyboard
%%
disp('Showing FP montage');
svmMontage(NEWANN_TE, NFP, false);
% keyboard
%%
disp('Showing TN montage');
svmMontage(NEWANN_TE, NTN, false);
% keyboard
%%
disp('Showing FN montage');
svmMontage(NEWANN_TE, NFN, false);
% keyboard



